home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / gfx / misc / gnuplot-3.7src.lha / gnuplot-3.7src / gnuplot-3.7.lha / gnuplot-3.7 / demo / animate.dem < prev    next >
Text File  |  1998-04-22  |  655b  |  23 lines
  1. # HBB: Demo animation, tumbling around 'glass.dat'
  2. # meant to replace the 'rotating whale' demo.
  3. set parametric
  4. set hidden3d
  5. set nokey
  6. set data style line
  7. xrot=60
  8. zrot=0
  9. set view xrot,zrot
  10. splot "glass.dat"
  11.  
  12. limit_iterations=40 # limits number of iterations if nonzero
  13.  
  14. if (!limit_iterations) print "The following animation will never stop on its own. You have"
  15. if (!limit_iterations) print "to stop it manually by interrupting gnuplot (e.g., press ^C)"
  16. print "On some screen terminal drivers for PC screens, you'll have"
  17. print "to hit a key to get to the next frame"
  18.  
  19. pause -1 "Press a key to start the rotation..."
  20.  
  21. iteration_count=0
  22. load "gnuplot.rot"
  23.